Additional Scripts/step1.R

# # execute NICE algorithm for interested correlation matrix
# input correlation matrix, self-determined threshold

#!/usr/bin/env Rscript
corr = commandArgs(trailingOnly=TRUE)
NICE = NICE_fast_cut(corr, threshold = 0.2, cutter = 1)
save(NICE,file = "data/cluster.rds")
save(corr,file = "data/shuffle.rds")
lwa19/ICN documentation built on Dec. 23, 2021, 10:23 p.m.